Public Class TabStripItem
    Inherits FarsiLibrary.Win.FATabStripItem

    Private m_strConsoleInfo As String

    Public Sub New(ByVal title As String)
        MyBase.New()
        Me.Title = title
    End Sub

    Public Overridable ReadOnly Property CanEdit() As Boolean
        Get
            Return True
        End Get
    End Property

    Public Overridable ReadOnly Property CanRedo() As Boolean
        Get
            Return False
        End Get
    End Property

    Public Overridable ReadOnly Property CanUndo() As Boolean
        Get
            Return False
        End Get
    End Property

    Public Property ConsoleInfo() As String
        Get
            Return m_strConsoleInfo
        End Get
        Set(ByVal value As String)
            m_strConsoleInfo = value
            If Me.Parent IsNot Nothing Then CType(Me.Parent, TabStrip).RaiseNotificacion()
        End Set
    End Property

    Public Overridable Sub OnBeginPrint(ByVal e As System.Drawing.Printing.PrintEventArgs)
    End Sub

    Public Overridable Sub OnCopy()
    End Sub

    Public Overridable Sub OnCut()
    End Sub

    Public Overridable Sub OnEndPrint(ByVal e As System.Drawing.Printing.PrintEventArgs)
    End Sub

    Public Overridable Sub OnItemAdded()
    End Sub

    Public Overridable Sub OnPaste()
    End Sub

    Public Overridable Sub OnPrintPage(ByVal e As System.Drawing.Printing.PrintPageEventArgs)
    End Sub

    Public Overridable Sub OnRedo()
    End Sub

    Public Overridable Sub OnSelectAll()
    End Sub

    Public Overridable Sub OnTabSelection()
    End Sub

    Public Overridable Sub OnUndo()
    End Sub

End Class
